<?php

namespace app\common\library;

use app\admin\model\usermanage\Users;
use app\api\model\GroupPv;
use app\api\model\UsersGroup;
use app\common\library\Sms as Smslib;
use app\common\model\UserRule;
use fast\Http;
use fast\Random;
use fast\Security;
use think\Config;
use think\Db;
use think\Exception;
use think\Request;
use think\Hook;

class Auth
{
    protected static $instance = null;
    protected $_error = '';
    protected $_logined = false;
    protected $_user = null;
    protected $_token = '';
    //Token默认有效时长
    protected $keeptime = 2592000;
    protected $requestUri = '';
    protected $rules = [];
    //默认配置
    protected $config = [];
    protected $options = [];
    //protected $allowFields = ['id', 'username', 'nickname', 'mobile', 'avatar', 'score'];
    protected $allowFields = ['id', 'account', 'nickname', 'binding', 'avatar_url','is_distributor','pv','fix_pv','blacklist',
        'contract_url','flowId','id_card_number','integral','is_distributor','is_register','level','level_name','money','price',
        'realname','time','pay_pwd'];

    public function __construct($options = [])
    {
        if ($config = Config::get('user')) {
            $this->config = array_merge($this->config, $config);
        }
        $this->options = array_merge($this->config, $options);
        $appid = \app\common\model\Config::get(['name'=>'app_id']);
        $this->appid = $appid->value;
        $app_secret = \app\common\model\Config::get(['name'=>'app_secret']);
        $this->appSecret = $app_secret->value;
    }

    /**
     *
     * @param array $options 参数
     * @return Auth
     */
    public static function instance($options = [])
    {
        if (is_null(self::$instance)) {
            self::$instance = new static($options);
        }

        return self::$instance;
    }

    /**
     * 获取User模型
     * @return User
     */
    public function getUser()
    {
        return $this->_user;
    }

    /**
     * 兼容调用user模型的属性
     *
     * @param string $name
     * @return mixed
     */
    public function __get($name)
    {
        return $this->_user ? $this->_user->$name : null;
    }

    /**
     * 兼容调用user模型的属性
     */
    public function __isset($name)
    {
        return isset($this->_user) ? isset($this->_user->$name) : false;
    }

    /**
     * 根据Token初始化
     *
     * @param string $token Token
     * @return boolean
     */
    public function init($token)
    {
        if ($this->_logined) {
            return true;
        }
        if ($this->_error) {
            return false;
        }
        $data = Token::get($token);
        if (!$data) {
            return false;
        }
        $user_id = intval($data['user_id']);
        if ($user_id > 0) {
            $user = Users::get($user_id);
            if (!$user) {
                $this->setError('Account not exist');
                return false;
            }
            if ($user['blacklist'] != 'normal') {
                $this->setError('Account is locked');
                return false;
            }
            $this->_user = $user;
            $this->_logined = true;
            $this->_token = $token;

            //初始化成功的事件
            Hook::listen("user_init_successed", $this->_user);

            return true;
        } else {
            $this->setError('You are not logged in');
            return false;
        }
    }

    /**
     * 注册用户
     *
     * @param string $username 用户名
     * @param string $password 密码
     * @param string $email    邮箱
     * @param string $mobile   手机号
     * @param array  $extend   扩展参数
     * @return boolean
     */
    public function register($account,$password,$realname,$binding,$id_card_number,$parent_account,$contact_account,$group_id)
    {
        $user = Users::get(['account'=>$account]);
        // 检测用户名、昵称、邮箱、手机号是否存在
        if ($user) {
            $this->setError('账号已存在');
            return false;
        }

        $user = Users::get(['binding'=>$binding]);
        if ($user) {
            $this->setError('Mobile already exist');
            return false;
        }

        //推荐人
        $parent = Users::get(['account'=>$parent_account]);

        if (!$parent){
            $this->setError('推荐人不存在');
            return false;
        }
        //接点人
        $contact = Users::get(['account'=>$contact_account]);
        if (!$contact){
            $this->setError('接点人不存在');
            return false;
        }

        //判断所选分组下是否有人
        $user_group_exists = Users::where(['group_id'=>$group_id])->find();
        $group = UsersGroup::get($group_id);

        if ($user_group_exists){
            $this->setError($group->group_name.'已有用户存在');
            return false;
        }

        $security_model = new Security();

        $data = [
            'username' => $account,
            'account' => $account,
            'password' => $security_model->generatePasswordHash($password, 5),
            'pay_pwd' => $security_model->generatePasswordHash($password, 5),
            'nickname'    => '微信用户',
            'binding'   => $binding,
            'group_id'  => $group_id,
            'realname'=>$realname,
            'id_card_number'=>$id_card_number,
            'avatar_url'=>'/assets/img/avatar.png',
            'createtime'=>time(),
            'contact_id'=>$contact->id,
            'parent_id'=>$parent->id,
        ];

        //账号注册时需要开启事务,避免出现垃圾数据
        Db::startTrans();
        try {
            $user = Users::create($data, true);
            $user_group_count = Users::where(['group_id'=>$group_id])->count();

            if ($user_group_count>=1){
                $group = UsersGroup::get($group_id);
                $group_count = UsersGroup::where(['type'=>$group->getAttr('type'),'user_id'=>$group->user_id])->count();
                $num = $group_count+1;
                $group_model = new UsersGroup();
                $group_model->setAttr('type',$group->getAttr('type'));
                $group_model->user_id = $group->user_id;

                //$group_model->parent_id = $this->group_id;
                if ($group->getAttr('type')==0){
                    $user_group =  UsersGroup::where(['type'=>0,'user_id'=>$group->user_id])
                        ->order('createtime asc')->select();
                    $group_model->group_name = 'A'.$num;
                } else {
                    $user_group =  UsersGroup::where(['type'=>1,'user_id'=>$group->user_id])
                        ->order('createtime asc')->select();
                    $group_model->group_name = 'B'.$num;
                }

                $group_model->save();

                $group_pv = new GroupPv();
                $group_pv->store_id = $this->store_id;
                $group_pv->first_group_id = $user_group[0]['id'];
                $group_pv->new_group_id = $group_model->id;
                $group_pv->first_pv = 0;
                $group_pv->new_pv = 0;
                $group_pv->save();
            }
            $first_group_id = $this->addGroup($user->id,0);
            $new_group_id = $this->addGroup($user->id,1);

            $group_pv = new GroupPv();
            $group_pv->store_id = $this->store_id;
            $group_pv->first_group_id = $first_group_id;
            $group_pv->new_group_id = $new_group_id;
            $group_pv->first_pv = 0;
            $group_pv->new_pv = 0;
            $group_pv->save();

            $ret = Smslib::send($binding, null, 'register',$account);

            $this->_user = Users::get($user->id);

            //设置Token
            $this->_token = Random::uuid();
            Token::set($this->_token, $user->id, $this->keeptime);

            //设置登录状态
            $this->_logined = true;

            //注册成功的事件
            Hook::listen("user_register_successed", $this->_user, $data);
            Db::commit();
        } catch (Exception $e) {
            $this->setError($e->getMessage());
            Db::rollback();
            return false;
        }
        return true;
    }

    public function addGroup($user_id,$type=0){
        $group_model = new UsersGroup();
        $group_model->setAttr('type',$type);
        $group_model->user_id = $user_id;
        $group_model->store_id = $this->store_id;
        if ($type==0){
            $group_model->group_name = 'A1';
        } else {
            $group_model->group_name = 'B1';
        }

        $group_model->save();
        return $group_model->id;
    }

    //设置支付密码
    public function setpaypwd($user_id,$pay_pwd)
    {
        $user = Users::get($user_id);
        $security_model = new Security();
        $user->pay_pwd = $security_model->generatePasswordHash($pay_pwd, 5);
        $res = $user->save();
        if ($res){
            return true;
        } else {
            $this->setError('设置失败');
            return false;
        }
    }

    //修改支付密码
    public function editpaypwd($user_id,$pay_pwd,$new_pay_pwd)
    {
        $user = Users::get($user_id);
        $security_model = new Security();
        if (!$security_model->validatePassword($pay_pwd, $user->pay_pwd)) {
            $this->setError('旧支付密码错误');
            return false;
        }
        $user->pay_pwd = $security_model->generatePasswordHash($new_pay_pwd, 5);
        $res = $user->save();
        if ($res){
            return true;
        } else {
            $this->setError('修改失败');
            return false;
        }
    }

    /**
     * 修改密码
     * @param string $newpassword       新密码
     * @param string $oldpassword       旧密码
     * @param bool   $ignoreoldpassword 忽略旧密码
     * @return boolean
     */
    public function changepwd($newpassword, $oldpassword = '', $ignoreoldpassword = false)
    {
        $security_model = new Security();

        if (!$this->_logined) {
            $this->setError('You are not logged in');
            return false;
        }
        //dump(!$security_model->validatePassword($oldpassword, $this->_user->password));die;
        //判断旧密码是否正确
        if ($security_model->validatePassword($oldpassword, $this->_user->password) || $ignoreoldpassword) {
            Db::startTrans();
            try {
                //$salt = Random::alnum();
                //$newpassword = $this->getEncryptPassword($newpassword, $salt);
                $password = $security_model->generatePasswordHash($newpassword, 5);
                $this->_user->save(['password' => $password]);

                Token::delete($this->_token);
                //修改密码成功的事件
                Hook::listen("user_changepwd_successed", $this->_user);
                Db::commit();
            } catch (Exception $e) {
                Db::rollback();
                $this->setError($e->getMessage());
                return false;
            }
            return true;
        } else {
            $this->setError('旧密码错误');
            return false;
        }
    }

    public function login($account, $password,$code)
    {
        $user = Users::get(['account' => $account]);
        if (!$user) {
            $this->setError('账户不正确');
            return false;
        }

        if ($user->blacklist == 1) {
            $this->setError('账户已经被锁定');
            return false;
        }

        $security = new Security();

        if (!$security->validatePassword($password, $user->password)) {
            $this->setError('密码错误');
            return false;
        }

        //直接登录会员
        return $this->direct($user->id,$code);
    }

    public function direct($user_id,$code)
    {
        $user = Users::get($user_id);
        if ($user) {
            Db::startTrans();
            try {
                if ($code){
                    $res = $this->getOpenid($code);
                    if (!$res || empty($res['openid'])) {
                        $this->setError('获取用户OpenId失败');
                        return false;
                    }
                    $user->wechat_open_id = $code?$res['openid']:'';
                    $user->save();
                }


                $this->_user = $user;

                $this->_token = Random::uuid();
                Token::set($this->_token, $user->id, $this->keeptime);

                $this->_logined = true;

                //登录成功的事件
                Hook::listen("user_login_successed", $this->_user);
                Db::commit();
            } catch (Exception $e) {
                Db::rollback();
                $this->setError($e->getMessage());
                return false;
            }
            return true;
        } else {
            return false;
        }
    }

    /**
     * 检测是否是否有对应权限
     * @param string $path   控制器/方法
     * @param string $module 模块 默认为当前模块
     * @return boolean
     */
    public function check($path = null, $module = null)
    {
        if (!$this->_logined) {
            return false;
        }

        $ruleList = $this->getRuleList();
        $rules = [];
        foreach ($ruleList as $k => $v) {
            $rules[] = $v['name'];
        }
        $url = ($module ? $module : request()->module()) . '/' . (is_null($path) ? $this->getRequestUri() : $path);
        $url = strtolower(str_replace('.', '/', $url));
        return in_array($url, $rules);
    }


    /**
     * 判断是否登录
     * @return boolean
     */
    public function isLogin()
    {
        if ($this->_logined) {
            return true;
        }
        return false;
    }

    /**
     * 获取当前Token
     * @return string
     */
    public function getToken()
    {
        return $this->_token;
    }

    /**
     * 获取会员基本信息
     */
    public function getUserinfo()
    {
        $data = $this->_user->toArray();
        $allowFields = $this->getAllowFields();
        $userinfo = array_intersect_key($data, array_flip($allowFields));
        $userinfo = array_merge($userinfo, Token::get($this->_token));
        return $userinfo;
    }

    /**
     * 获取会员组别规则列表
     * @return array|bool|\PDOStatement|string|\think\Collection
     */
    public function getRuleList()
    {
        if ($this->rules) {
            return $this->rules;
        }
        $group = $this->_user->group;
        if (!$group) {
            return [];
        }
        $rules = explode(',', $group->rules);
        $this->rules = UserRule::where('status', 'normal')->where('id', 'in', $rules)->field('id,pid,name,title,ismenu')->select();
        return $this->rules;
    }

    /**
     * 获取当前请求的URI
     * @return string
     */
    public function getRequestUri()
    {
        return $this->requestUri;
    }

    /**
     * 设置当前请求的URI
     * @param string $uri
     */
    public function setRequestUri($uri)
    {
        $this->requestUri = $uri;
    }

    /**
     * 获取允许输出的字段
     * @return array
     */
    public function getAllowFields()
    {
        return $this->allowFields;
    }

    /**
     * 设置允许输出的字段
     * @param array $fields
     */
    public function setAllowFields($fields)
    {
        $this->allowFields = $fields;
    }

    /**
     * 删除一个指定会员
     * @param int $user_id 会员ID
     * @return boolean
     */
    public function delete($user_id)
    {
        $user = Users::get($user_id);
        if (!$user) {
            return false;
        }
        Db::startTrans();
        try {
            // 删除会员
            Users::destroy($user_id);
            // 删除会员指定的所有Token
            Token::clear($user_id);

            Hook::listen("user_delete_successed", $user);
            Db::commit();
        } catch (Exception $e) {
            Db::rollback();
            $this->setError($e->getMessage());
            return false;
        }
        return true;
    }

    /**
     * 获取密码加密后的字符串
     * @param string $password 密码
     * @param string $salt     密码盐
     * @return string
     */
    public function getEncryptPassword($password, $salt = '')
    {
        return md5(md5($password) . $salt);
    }

    /**
     * 检测当前控制器和方法是否匹配传递的数组
     *
     * @param array $arr 需要验证权限的数组
     * @return boolean
     */
    public function match($arr = [])
    {
        $request = Request::instance();
        $arr = is_array($arr) ? $arr : explode(',', $arr);
        if (!$arr) {
            return false;
        }
        $arr = array_map('strtolower', $arr);
        // 是否存在
        if (in_array(strtolower($request->action()), $arr) || in_array('*', $arr)) {
            return true;
        }

        // 没找到匹配
        return false;
    }

    /**
     * 设置会话有效时间
     * @param int $keeptime 默认为永久
     */
    public function keeptime($keeptime = 0)
    {
        $this->keeptime = $keeptime;
    }

    /**
     * 渲染用户数据
     * @param array  $datalist  二维数组
     * @param mixed  $fields    加载的字段列表
     * @param string $fieldkey  渲染的字段
     * @param string $renderkey 结果字段
     * @return array
     */
    public function render(&$datalist, $fields = [], $fieldkey = 'user_id', $renderkey = 'userinfo')
    {
        $fields = !$fields ? ['id', 'nickname', 'level', 'avatar'] : (is_array($fields) ? $fields : explode(',', $fields));
        $ids = [];
        foreach ($datalist as $k => $v) {
            if (!isset($v[$fieldkey])) {
                continue;
            }
            $ids[] = $v[$fieldkey];
        }
        $list = [];
        if ($ids) {
            if (!in_array('id', $fields)) {
                $fields[] = 'id';
            }
            $ids = array_unique($ids);
            $selectlist = Users::where('id', 'in', $ids)->column($fields);
            foreach ($selectlist as $k => $v) {
                $list[$v['id']] = $v;
            }
        }
        foreach ($datalist as $k => &$v) {
            $v[$renderkey] = $list[$v[$fieldkey]] ?? null;
        }
        unset($v);
        return $datalist;
    }


    /**
     * 设置错误信息
     *
     * @param string $error 错误信息
     * @return Auth
     */
    public function setError($error)
    {
        $this->_error = $error;
        return $this;
    }

    /**
     * 获取错误信息
     * @return string
     */
    public function getError()
    {
        return $this->_error ? __($this->_error) : '';
    }


    /**
     * Notes:微信openid
     * User: gai
     * Date: 2022/6/20
     * Time: 11:40
     */
    public function getOpenid($code){
        $api = "https://api.weixin.qq.com/sns/jscode2session?appid={$this->appid}&secret={$this->appSecret}&js_code={$code}&grant_type=authorization_code";
        $data = Http::sendRequest($api,'','get');
        $res = json_decode($data['msg'], true);
        return $res;
    }

}